home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 1998 #4
/
Amiga Plus CD - 1998 - No. 4.iso
/
pd
/
musik
/
mrmpeg
/
getahi.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
1997-12-16
|
458b
|
19 lines
/* GetAHI.rexx */
options results; address MrMPEG
MUIA_Disabled = 0x80423661
text ID AHID MUIA_Disabled 1
text ID AHID
address command 'GetAHIModeID 'X2D(right(result, 8))' >PIPE:MPEG_AHI'
if open('AHIMode', 'PIPE:MPEG_AHI', 'r') = 1 then do
temp = readln('AHIMode')
if left(temp, 2) = '0x' then do
text ID AHID LABEL "\033b\033r"temp
end
end
else request ID WARN GADGETS '"OK"' '"No AHI device available."'
text ID AHID MUIA_Disabled 0
return